home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 3: Developer Tools / Linux Cubed Series 3 - Developer Tools.iso / devel / lang / lisp / gcl-1.000 / gcl-1 / gcl-1.0 / lsp / defstruct.h < prev    next >
Encoding:
C/C++ Source or Header  |  1994-05-10  |  5.6 KB  |  187 lines

  1.  
  2. static object LI1();
  3. static object LI10();
  4. static L11();
  5. static object LI12();
  6. static L15();
  7. static object LI1();
  8. #define VMB1 register object *base=vs_top; object  V36 ,V35 ,V33 ,V31 ,V30 ,V28 ,V27; object Vcs[12];
  9. #define VMS1  register object *sup=vs_top+4;vs_top=sup;
  10. #define VMV1 vs_reserve(4);
  11. #define VMR1(VMT1) vs_top=base ; return(VMT1);
  12. static object LI2();
  13. #define VMB2 register object *base=vs_top; object  V85 ,V79 ,V73 ,V64 ,V56;
  14. #define VMS2  register object *sup=vs_top+4;vs_top=sup;
  15. #define VMV2 vs_reserve(4);
  16. #define VMR2(VMT2) vs_top=base ; return(VMT2);
  17. static object LI3();
  18. #define VMB3 register object *base=vs_top;
  19. #define VMS3  register object *sup=vs_top+1;vs_top=sup;
  20. #define VMV3 vs_reserve(1);
  21. #define VMR3(VMT3) vs_top=base ; return(VMT3);
  22. static object LI4();
  23. #define VMB4 register object *base=vs_top; object  V109 ,V106 ,V105;
  24. #define VMS4  register object *sup=vs_top+1;vs_top=sup;
  25. #define VMV4 vs_reserve(1);
  26. #define VMR4(VMT4) vs_top=base ; return(VMT4);
  27. static object LI5();
  28. #define VMB5 register object *base=vs_top;
  29. #define VMS5  register object *sup=vs_top+2;vs_top=sup;
  30. #define VMV5 vs_reserve(2);
  31. #define VMR5(VMT5) vs_top=base ; return(VMT5);
  32. static object LI6();
  33. #define VMB6 register object *base=vs_top; object  V145 ,V144 ,V142 ,V141 ,V140 ,V138 ,V137 ,V135;
  34. #define VMS6  register object *sup=vs_top+4;vs_top=sup;
  35. #define VMV6 vs_reserve(4);
  36. #define VMR6(VMT6) vs_top=base ; return(VMT6);
  37. static object LI7();
  38. #define VMB7 register object *base=vs_top; object  V166 ,V165 ,V164 ,V160 ,V159;
  39. #define VMS7  register object *sup=vs_top+2;vs_top=sup;
  40. #define VMV7 vs_reserve(2);
  41. #define VMR7(VMT7) vs_top=base ; return(VMT7);
  42. static int LI8();
  43. #define VMB8 register object *base=vs_top;
  44. #define VMS8  register object *sup=vs_top+2;vs_top=sup;
  45. #define VMV8 vs_reserve(2);
  46. #define VMR8(VMT8) vs_top=base ; return(VMT8);
  47. static object LI9();
  48. #define VMB9 register object *base=vs_top; object  V213 ,V212 ,V211 ,V210 ,V209 ,V196;
  49. #define VMS9  register object *sup=vs_top+3;vs_top=sup;
  50. #define VMV9 vs_reserve(3);
  51. #define VMR9(VMT9) vs_top=base ; return(VMT9);
  52. static object LI10();
  53. #define VMB10 register object *base=vs_top; object  V254 ,V251; object Vcs[14];
  54. #define VMS10  register object *sup=vs_top+7;vs_top=sup;
  55. #define VMV10 vs_reserve(7);
  56. #define VMR10(VMT10) vs_top=base ; return(VMT10);
  57. #define VC11 object  V312 ,V311 ,V307 ,V306 ,V305 ,V302 ,V299 ,V298 ,V297 ,V293 ,V292 ,V291 ,V289 ,V288 ,V287 ,V284 ,V283 ,V282 ,V281;
  58. static object LI12();
  59. static int VK12defaults[18]={-2,142,-2,-2,-2,-2,-2,-2,-2,142,-2,-2,-2,-2,-2,-2,-2,-2};
  60. static struct { short n,allow_other_keys;int *defaults;
  61.      int keys[18];} LI12key={18,0,VK12defaults,{77,74,75,73,72,76,143,67,66,65,71,70,68,69,144,64,63,62}};
  62. #define VMB12 register object *base=vs_top; object Vcs[36];
  63. #define VMS12  register object *sup=vs_top+19;vs_top=sup;
  64. #define VMV12 vs_reserve(19);
  65. #define VMR12(VMT12) vs_top=base ; return(VMT12);
  66. static object LI13();
  67. #define VMB13 object  V338;
  68. #define VMS13
  69. #define VMV13
  70. #define VMR13(VMT13) return(VMT13);
  71. static object LI14();
  72. #define VMB14
  73. #define VMS14
  74. #define VMV14
  75. #define VMR14(VMT14) return(VMT14);
  76. #define VC15 object  V356;
  77. static LC20();
  78. #define VC16
  79. static LC19();
  80. #define VC17
  81. static LC18();
  82. #define VC18
  83. static LC17();
  84. #define VC19
  85. static LC16();
  86. #define VC20
  87. static LC20();
  88. static LC19();
  89. static LC18();
  90. static LC17();
  91. static LC16();
  92. #define VM20 3
  93. #define VM19 3
  94. #define VM18 2
  95. #define VM17 2
  96. #define VM16 3
  97. #define VM15 9
  98. #define VM14 0
  99. #define VM13 0
  100. #define VM12 19
  101. #define VM11 18
  102. #define VM10 7
  103. #define VM9 3
  104. #define VM8 2
  105. #define VM7 2
  106. #define VM6 4
  107. #define VM5 2
  108. #define VM4 1
  109. #define VM3 1
  110. #define VM2 4
  111. #define VM1 4
  112. static char * VVi[148]={
  113. #define Cdata VV[147]
  114. (char *)(LI1),
  115. (char *)(LI2),
  116. (char *)(LI3),
  117. (char *)(LI4),
  118. (char *)(LI5),
  119. (char *)(LI6),
  120. (char *)(LI7),
  121. (char *)(LI8),
  122. (char *)(LI9),
  123. (char *)(LI10),
  124. (char *)(L11),
  125. (char *)(LI12),
  126. (char *)(&LI12key),
  127. (char *)(LI13),
  128. (char *)(LI14),
  129. (char *)(L15),
  130. (char *)(&LC19)
  131. };
  132. #define VV ((object *)VVi)
  133. static  LnkT146() ;
  134. static  (*Lnk146)() = LnkT146;
  135. static  LnkT145() ;
  136. static  (*Lnk145)() = LnkT145;
  137. static object  LnkTLI141() ;
  138. static object  (*LnkLI141)() = LnkTLI141;
  139. static object  LnkTLI140() ;
  140. static object  (*LnkLI140)() = LnkTLI140;
  141. static object  LnkTLI139() ;
  142. static object  (*LnkLI139)() = LnkTLI139;
  143. static object  LnkTLI133() ;
  144. static object  (*LnkLI133)() = LnkTLI133;
  145. static object  LnkTLI132() ;
  146. static object  (*LnkLI132)() = LnkTLI132;
  147. static object  LnkTLI131() ;
  148. static object  (*LnkLI131)() = LnkTLI131;
  149. static object  LnkTLI130() ;
  150. static object  (*LnkLI130)() = LnkTLI130;
  151. static  LnkT129() ;
  152. static  (*Lnk129)() = LnkT129;
  153. static object  LnkTLI128() ;
  154. static object  (*LnkLI128)() = LnkTLI128;
  155. static  LnkT124() ;
  156. static  (*Lnk124)() = LnkT124;
  157. static  LnkT123() ;
  158. static  (*Lnk123)() = LnkT123;
  159. static int  LnkTLI122() ;
  160. static int  (*LnkLI122)() = LnkTLI122;
  161. static object  LnkTLI121() ;
  162. static object  (*LnkLI121)() = LnkTLI121;
  163. static  LnkT120() ;
  164. static  (*Lnk120)() = LnkT120;
  165. static  LnkT119() ;
  166. static  (*Lnk119)() = LnkT119;
  167. static  LnkT118() ;
  168. static  (*Lnk118)() = LnkT118;
  169. static object  LnkTLI117() ;
  170. static object  (*LnkLI117)() = LnkTLI117;
  171. static object  LnkTLI116() ;
  172. static object  (*LnkLI116)() = LnkTLI116;
  173. static object  LnkTLI115() ;
  174. static object  (*LnkLI115)() = LnkTLI115;
  175. static object  LnkTLI114() ;
  176. static object  (*LnkLI114)() = LnkTLI114;
  177. static object  LnkTLI110() ;
  178. static object  (*LnkLI110)() = LnkTLI110;
  179. static  LnkT109() ;
  180. static  (*Lnk109)() = LnkT109;
  181. static  LnkT108() ;
  182. static  (*Lnk108)() = LnkT108;
  183. static object  LnkTLI107() ;
  184. static object  (*LnkLI107)() = LnkTLI107;
  185. static  LnkT106() ;
  186. static  (*Lnk106)() = LnkT106;
  187.